﻿Public Class Maestro
    Function Agregar(ByVal mantenimiento As Ejemplo.BE.Maestro) As Ejemplo.BE.Maestro

        Try
            Dim dsMantinimiento As Ejemplo.DS.Maestro
            dsMantinimiento = New Ejemplo.DS.Maestro
            mantenimiento = dsMantinimiento.Agregar(mantenimiento)

        Catch ex As Exception
            mantenimiento = Nothing
        End Try

        Return mantenimiento
    End Function

    Function Editar(ByVal mantenimiento As Ejemplo.BE.Maestro) As Boolean
        Dim dsMantinimiento As Ejemplo.DS.Maestro
        dsMantinimiento = New Ejemplo.DS.Maestro
        Return dsMantinimiento.Editar(mantenimiento)
    End Function

    Function Eliminar(ByVal id As Integer) As Boolean
        Dim dsMantinimiento As Ejemplo.DS.Maestro
        dsMantinimiento = New Ejemplo.DS.Maestro
        Return dsMantinimiento.Eliminar(id)
    End Function

    Function Listar() As List(Of Ejemplo.BE.Maestro)
        Dim dsMantinimiento As Ejemplo.DS.Maestro
        dsMantinimiento = New Ejemplo.DS.Maestro
        Return dsMantinimiento.Listar
    End Function

    Function Obtener(ByVal id As Integer) As Ejemplo.BE.Maestro
        Dim dsMantinimiento As Ejemplo.DS.Maestro
        dsMantinimiento = New Ejemplo.DS.Maestro
        Return dsMantinimiento.Obtener(id)
    End Function


    Function Filtrar(ByVal mantenimiento As Ejemplo.BE.MantenimientoBasico) As List(Of Ejemplo.BE.MantenimientoBasico)

    End Function


End Class
